home *** CD-ROM | disk | FTP | other *** search
/ infoROM 17,000 Product Descriptions for Business / infoROM Product Descriptions for Business - ESX Interactive.ISO / argdemos / nexsys / acad.lsp < prev    next >
Encoding:
Lisp/Scheme  |  1993-06-21  |  357 b   |  24 lines

  1. ; startup for demo
  2. ;
  3. ; Derrick Oswald
  4. ; Nexsys Consulting Inc.
  5. ; 44 Douglas Drive
  6. ; Ayr, Ontario
  7. ; N0B 1E0
  8. ; (519) 632-8243
  9. ; (519) 632-8244 FAX
  10. ;
  11. (defun s::startup ()
  12.  
  13.   ; load the ovly ads program
  14. ; now done by acad.ads file
  15. ;  (xload "ovly")
  16.  
  17.   ; load the demo lisp program
  18.   (load "demo")
  19.  
  20.   ; run the demo
  21.   (c:demo)
  22.  
  23.   (princ))
  24.